home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / compuserve-file-archive / 03 Demos and Info / CEE2B.BIN / orbits.d < prev    next >
Encoding:
Text File  |  1990-02-12  |  4.0 KB  |  85 lines

  1. -----------------------------
  2. ╧╥┬╔╘ ┼╠┼═┼╬╘╙
  3. ┬Y ╥USSELL ╦. ╨RATER
  4. (├)1993
  5. ┴LL ╥IGHTS ╥ESERVED
  6. -----------------------------
  7.  
  8.  
  9.  
  10. ╧╥┬╔╘ ┼╠┼═┼╬╘╙ IS THE ORIGINAL WORK OF THE AUTHOR AND MAY BE DISTRIBUTED
  11. FREELY WITH THE CONDITION THAT THIS NOTICE MUST REMAIN ATTACHED AND NO
  12. CHARGE MAY BE MADE FOR THE PROGRAM. ╘HE PROGRAM HAS BEEN DESIGNED TO RUN
  13. IN ├-64 MODE, ├128 40 COLUMN AND ├128 80 COLUMN MODES. ╔N ├128 80 COLUMN
  14. MODE, SETTING THE COMPUTER TO ╞┴╙╘ HELPS A LITTLE.
  15.  
  16. ╧╥┬╔╘ ┼╠┼═┼╬╘╙ CAME FROM MY CURIOSITY ABOUT HOW HIGH A GEOSTATIONARY
  17. SATELLITE WOULD BE AND HOW FAST THE SATELLITE WOULD BE MOVING. ┴FTER
  18. THAT HAD BEEN ACCOMPLISHED, ╔ FOUND THAT IT WOULD BE SIMPLE TO EXPAND IT
  19. TO COVER AN ORBIT OF ANY RADIUS ABOVE ANY BODY FOR WHICH THE MASS IS
  20. KNOWN. ╔ HAVE INCLUDED THE BEST AVAILABLE DATA FOR THE SUN, NINE
  21. PLANETS AND THE MOON.
  22.  
  23. ╧╥┬╔╘ ┼╠┼═┼╬╘╙ IS SURPRISINGLY ACCURATE FOR SO SIMPLE A PROGRAM
  24. GIVING RESPONSES WHICH ARE USUALLY WITHIN 1% OF PUBLISHED FIGURES. ╔
  25. WOULDN'T WANT TO SET OUT ON A VOYAGE TO THE MOON BASED ON THAT ACCURACY,
  26. BUT FOR PRACTICAL DISCUSSION, IT IS PLENTY ACCURATE.
  27.  
  28. ╧RBIT TIMES GIVEN ARE FOR SIDEREAL ORBITS. ╘O EXPLAIN, THE MOON ORBITS
  29. THE EARTH IN ABOUT 28 DAYS. ╙PECIFICALLY, THE MOON WILL COMPLETE
  30. ONE FULL CIRCLE AND RETURN TO THE SAME POSITION AMONG THE FIXED STARS
  31. IN 27.32166 DAYS. ╘HAT'S THE TIME OF THE SIDEREAL ORBIT. ╚OWEVER, THE
  32. EARTH-MOON SYSTEM WILL HAVE COMPLETED ONE THIRTEENTH (APPROXIMATELY) OF A
  33. SOLAR ORBIT IN THAT TIME. ╘HIS MEANS THAT THE MOON WILL HAVE TO TRAVEL
  34. JUST A LITTLE FARTHER TO RETURN TO THE SAME POSITION RELATIVE TO THE
  35. SUN. ╘HEREFORE, THE LUNAR MONTH IS 29.5306 DAYS.
  36.  
  37. ┴LL ORBITS ARE ELLIPTICAL TO A GREATER OR LESSER DEGREE. ╔ HAVE
  38. TAKEN THE LIBERTY OF TREATING THEM AS CIRCULAR ORBITS. ╘HIS INTRODUCES
  39. SOME ERROR, THE MAGNITUDE BEING DEPENDENT ON THE DEGREE TO WHICH THE
  40. ORBIT DEVIATES FROM CIRCULAR. ╨LANETARY ORBITS OTHER THAN ╨LUTO
  41. WILL BE QUITE ACCURATE. ╨LUTO'S ELLIPTICAL ORBIT WILL BE A POOR
  42. MATCH AND THE EXTREMELY ELLIPTICAL ORBITS OF COMETS WOULD PROBABLY BE
  43. PRETTY MEANINGLESS.
  44.  
  45. ╦NOWN ELEMENT INPUTS MAY BE VELOCITY IN ORBIT, HEIGHT OR RADIUS OF THE
  46. ORBIT OR THE TIME TO COMPLETE AN ORBIT. ┼ACH SUBMENU ALLOWS FOR SEV-
  47. ERAL TYPES OF INPUT. ╘IME MAY BE ENTERED AS YEARS, DAYS, HOURS, MIN-
  48. UTES OR ANY DESIRED COMBINATION OF THESE. ┘OU CAN EVEN USE DECIMAL
  49. FRACTIONS. ╧NE DAY AND SIX HOURS WOULD GIVE THE SAME RESULT AS 1.25
  50. DAYS. ─ISTANCES MAY BE IN METERS OR MILES. ╙PEED IN ORBIT MAY BE IN MILES PER HOUR OR METERS PER SECOND. ╩UST DECIDE WHAT YOU KNOW ABOUT THE ORBIT
  51. YOU ARE INTERESTED IN AND YOU WILL FIND A SOME PLACE WHERE YOU CAN
  52. ENTER IT. ╞OR INSTANCE, IF YOU WANT THE FIGURES FOR A GEOSTATIONARY OR-
  53. BIT, YOU KNOW THAT IT MUST HAVE A PERIOD OF ONE DAY. ╙ELECT ╨ERIOD AND
  54. ENTER 1 DAY OR 24 HOURS.
  55.  
  56. ┴LL INPUT IS CONVERTED TO METERS AND SECONDS BEFORE ANY CALCULATION
  57. BEGINS AND THE OUTPUT DATA IS CONVERTED BACK TO BOTH METRIC AND
  58. ┼NGLISH UNITS FOR THE OUTPUT DISPLAY PAGE. ╙OME ROUNDING ERROR USUALLY
  59. OCCURS, LIKE 1 DAY WILL USUALLY APPEAR AS 23 HOURS AND 59 MINUTES.
  60.  
  61.  
  62. ┴ NOTE OF POSSIBLE INTEREST WHICH IS NOT INCLUDED IN THE PRINTOUT IS
  63. THAT THE VELOCITY NEEDED TO ESCAPE THE GRAVITY WELL OF A BODY WHILE IN
  64. ORBIT AROUND THAT BODY IS THE SQUARE ROOT OF TWO (1.414) TIMES THE
  65. VELOCITY IN THE ORBIT. ╘O CALCULATE THE ESCAPE VELOCITY FROM ┼ARTH, FOR
  66. INSTANCE, ENTER THE ALTITUDE AS 0 METERS AND MULTIPLY THE RESULTING
  67. ORBITAL VELOCITY BY 1.414. ╘HIS WOULD LEAVE YOU WITHOUT REMAINING VELO-
  68. CITY TO GO ANYWHERE, SO YOUR DESIRED VELOCITY AFTER ESCAPE WOULD HAVE
  69. TO BE ADDED TO THE ESCAPE VELOCITY.
  70.  
  71. ╘O ESCAPE THE SOLAR SYSTEM FROM AN ┼ARTH LAUNCH, YOU WOULD HAVE TO ADD
  72. THE SOLAR ESCAPE VELOCITY FROM EARTH ORBIT TO THE ESCAPE VELOCITY FROM
  73. THE EARTH ORBIT. ╔NTERESTING IN THEORY, BUT PROBABLY IMPOSSIBLE TO
  74. DO IN FACT BECAUSE OF THE WEIGHT OF THE REQUIRED FUEL. ╘HE ╨IONEER AND
  75. ╓OYAGER VEHICLES USED THE SLING SHOT EFFECT TO GAIN VELOCITY FROM EACH
  76. PLANET THAT THEY PASSED.
  77.  
  78. ┼NJOY THE PROGRAM. ╨LAY AROUND WITH IT AND IF YOU FIND ANYTHING THAT YOU
  79. WISH TO SHARE, FEEL FREE TO DROP ME A LINE AT:
  80.  
  81. ╥USSELL ╨RATER
  82. 608 ╬. 9TH. ╨LAZA,
  83. ╨ARKER, ╞╠, 32404
  84.  
  85.